home *** CD-ROM | disk | FTP | other *** search
/ Max Calendar 2002 / Max Calendar 2002.iso / pc / Data_2 / Utility2.dxr / 00005_Rollover Schermata ScreenSaver Pc.ls < prev    next >
Encoding:
Text File  |  2001-10-17  |  936 b   |  34 lines
  1. on exitFrame
  2.   ImpostaCursori()
  3.   channel = rollover()
  4.   repeat with canale = 5 to 8
  5.     if channel = canale then
  6.       if the puppet of sprite canale = 0 then
  7.         puppetSprite(canale, 1)
  8.         Temp = the number of member (the name of member the memberNum of sprite canale & "_ACC")
  9.         if Temp > 0 then
  10.           set the memberNum of sprite canale to Temp
  11.         end if
  12.       end if
  13.       next repeat
  14.     end if
  15.     puppetSprite(canale, 0)
  16.   end repeat
  17.   channel = rollover()
  18.   repeat with canale = 12 to 23
  19.     if channel = canale then
  20.       if the puppet of sprite canale = 0 then
  21.         puppetSprite(canale, 1)
  22.         Temp = the number of member (the name of member the memberNum of sprite canale & "_ACC")
  23.         if Temp > 0 then
  24.           set the memberNum of sprite canale to Temp
  25.         end if
  26.       end if
  27.       next repeat
  28.     end if
  29.     puppetSprite(canale, 0)
  30.   end repeat
  31.   updateStage()
  32.   go(the frame)
  33. end
  34.